home *** CD-ROM | disk | FTP | other *** search
- program Demo;
- { NOTE: This project source has been modified to force the Application }
- { to be hidden when it loads. }
-
- uses
- { 1. The following line MUST be the first line in the uses clause to force }
- { the Application to be hidden on startup. }
- {$IFDEF WIN32} PGHide32,PGTray95, {$ELSE} PGTray95, {$ENDIF}
- Forms,
- WinTypes,
- WinProcs,
- Main in 'MAIN.PAS' {MainForm};
-
- {$R *.RES}
-
- begin
- Application.Title := 'Animated TrayIcon VCL for Delphi and C++ Builder';
- Application.CreateForm(TMainForm, MainForm);
-
- { 2. Put the following line in place of the Application.Run line }
- { normally found here in the project source. }
- RunTrayApplication;
- end.
-